perm filename ZV2OD.DAT[SCR,LCS] blob
sn#199900 filedate 1976-02-03 generic text, type T, neo UTF8
RCDFLG←-1;
< ZV2OD.DAT -- RANDOM NUMBER= 1
PLAY;
TOOT 0.000 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 1
SYNTH(F3); 1 1 2.000 1.000 3.000 0.000 4.000 1.000
5.000 0.000 6.000 1.000 7.000 0.000 999.000
;PRINT(P1);< SYNTH 1
TOOT 0.300 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 2
SYNTH(F3); 1 1 2.000 0.970 3.000 0.030 4.000 0.970
5.000 0.030 6.000 0.970 7.000 0.030 999.000
;PRINT(P1);< SYNTH 2
TOOT 0.600 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 3
SYNTH(F3); 1 1 2.000 0.940 3.000 0.060 4.000 0.940
5.000 0.060 6.000 0.940 7.000 0.060 999.000
;PRINT(P1);< SYNTH 3
TOOT 0.900 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 4
SYNTH(F3); 1 1 2.000 0.910 3.000 0.090 4.000 0.910
5.000 0.090 6.000 0.910 7.000 0.090 999.000
;PRINT(P1);< SYNTH 4
TOOT 1.200 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 5
SYNTH(F3); 1 1 2.000 0.880 3.000 0.120 4.000 0.880
5.000 0.120 6.000 0.880 7.000 0.120 999.000
;PRINT(P1);< SYNTH 5
TOOT 1.500 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 6
SYNTH(F3); 1 1 2.000 0.850 3.000 0.150 4.000 0.850
5.000 0.150 6.000 0.850 7.000 0.150 999.000
;PRINT(P1);< SYNTH 6
TOOT 1.800 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 7
SYNTH(F3); 1 1 2.000 0.820 3.000 0.180 4.000 0.820
5.000 0.180 6.000 0.820 7.000 0.180 999.000
;PRINT(P1);< SYNTH 7
TOOT 2.100 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 8
SYNTH(F3); 1 1 2.000 0.790 3.000 0.210 4.000 0.790
5.000 0.210 6.000 0.790 7.000 0.210 999.000
;PRINT(P1);< SYNTH 8
TOOT 2.400 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 9
SYNTH(F3); 1 1 2.000 0.760 3.000 0.240 4.000 0.760
5.000 0.240 6.000 0.760 7.000 0.240 999.000
;PRINT(P1);< SYNTH 9
TOOT 2.700 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 10
SYNTH(F3); 1 1 2.000 0.730 3.000 0.270 4.000 0.730
5.000 0.270 6.000 0.730 7.000 0.270 999.000
;PRINT(P1);< SYNTH 10
TOOT 3.000 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 11
SYNTH(F3); 1 1 2.000 0.700 3.000 0.300 4.000 0.700
5.000 0.300 6.000 0.700 7.000 0.300 999.000
;PRINT(P1);< SYNTH 11
TOOT 3.300 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 12
SYNTH(F3); 1 1 2.000 0.670 3.000 0.330 4.000 0.670
5.000 0.330 6.000 0.670 7.000 0.330 999.000
;PRINT(P1);< SYNTH 12
TOOT 3.600 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 13
SYNTH(F3); 1 1 2.000 0.640 3.000 0.360 4.000 0.640
5.000 0.360 6.000 0.640 7.000 0.360 999.000
;PRINT(P1);< SYNTH 13
TOOT 3.900 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 14
SYNTH(F3); 1 1 2.000 0.610 3.000 0.390 4.000 0.610
5.000 0.390 6.000 0.610 7.000 0.390 999.000
;PRINT(P1);< SYNTH 14
TOOT 4.200 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 15
SYNTH(F3); 1 1 2.000 0.580 3.000 0.420 4.000 0.580
5.000 0.420 6.000 0.580 7.000 0.420 999.000
;PRINT(P1);< SYNTH 15
TOOT 4.500 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 16
SYNTH(F3); 1 1 2.000 0.550 3.000 0.450 4.000 0.550
5.000 0.450 6.000 0.550 7.000 0.450 999.000
;PRINT(P1);< SYNTH 16
TOOT 4.800 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 17
SYNTH(F3); 1 1 2.000 0.520 3.000 0.480 4.000 0.520
5.000 0.480 6.000 0.520 7.000 0.480 999.000
;PRINT(P1);< SYNTH 17
TOOT 5.100 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 18
SYNTH(F3); 1 1 2.000 0.490 3.000 0.510 4.000 0.490
5.000 0.510 6.000 0.490 7.000 0.510 999.000
;PRINT(P1);< SYNTH 18
TOOT 5.400 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 19
SYNTH(F3); 1 1 2.000 0.460 3.000 0.540 4.000 0.460
5.000 0.540 6.000 0.460 7.000 0.540 999.000
;PRINT(P1);< SYNTH 19
TOOT 5.700 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 20
SYNTH(F3); 1 1 2.000 0.430 3.000 0.570 4.000 0.430
5.000 0.570 6.000 0.430 7.000 0.570 999.000
;PRINT(P1);< SYNTH 20
TOOT 6.000 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 21
SYNTH(F3); 1 1 2.000 0.400 3.000 0.600 4.000 0.400
5.000 0.600 6.000 0.400 7.000 0.600 999.000
;PRINT(P1);< SYNTH 21
TOOT 6.300 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 22
SYNTH(F3); 1 1 2.000 0.370 3.000 0.630 4.000 0.370
5.000 0.630 6.000 0.370 7.000 0.630 999.000
;PRINT(P1);< SYNTH 22
TOOT 6.600 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 23
SYNTH(F3); 1 1 2.000 0.340 3.000 0.660 4.000 0.340
5.000 0.660 6.000 0.340 7.000 0.660 999.000
;PRINT(P1);< SYNTH 23
TOOT 6.900 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 24
SYNTH(F3); 1 1 2.000 0.310 3.000 0.690 4.000 0.310
5.000 0.690 6.000 0.310 7.000 0.690 999.000
;PRINT(P1);< SYNTH 24
TOOT 7.200 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 25
SYNTH(F3); 1 1 2.000 0.280 3.000 0.720 4.000 0.280
5.000 0.720 6.000 0.280 7.000 0.720 999.000
;PRINT(P1);< SYNTH 25
TOOT 7.500 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 26
SYNTH(F3); 1 1 2.000 0.250 3.000 0.750 4.000 0.250
5.000 0.750 6.000 0.250 7.000 0.750 999.000
;PRINT(P1);< SYNTH 26
TOOT 7.800 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 27
SYNTH(F3); 1 1 2.000 0.220 3.000 0.780 4.000 0.220
5.000 0.780 6.000 0.220 7.000 0.780 999.000
;PRINT(P1);< SYNTH 27
TOOT 8.100 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 28
SYNTH(F3); 1 1 2.000 0.190 3.000 0.810 4.000 0.190
5.000 0.810 6.000 0.190 7.000 0.810 999.000
;PRINT(P1);< SYNTH 28
TOOT 8.400 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 29
SYNTH(F3); 1 1 2.000 0.160 3.000 0.840 4.000 0.160
5.000 0.840 6.000 0.160 7.000 0.840 999.000
;PRINT(P1);< SYNTH 29
TOOT 8.700 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 30
SYNTH(F3); 1 1 2.000 0.130 3.000 0.870 4.000 0.130
5.000 0.870 6.000 0.130 7.000 0.870 999.000
;PRINT(P1);< SYNTH 30
TOOT 9.000 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 31
SYNTH(F3); 1 1 2.000 0.100 3.000 0.900 4.000 0.100
5.000 0.900 6.000 0.100 7.000 0.900 999.000
;PRINT(P1);< SYNTH 31
TOOT 9.300 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 32
SYNTH(F3); 1 1 2.000 0.070 3.000 0.930 4.000 0.070
5.000 0.930 6.000 0.070 7.000 0.930 999.000
;PRINT(P1);< SYNTH 32
TOOT 9.600 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 33
SYNTH(F3); 1 1 2.000 0.040 3.000 0.960 4.000 0.040
5.000 0.960 6.000 0.040 7.000 0.960 999.000
;PRINT(P1);< SYNTH 33
TOOT 9.900 0.300 220.000 2000.000 F1 F3
;PRINT(P1);< TOOT 34
SYNTH(F3); 1 1 2.000 0.010 3.000 0.990 4.000 0.010
5.000 0.990 6.000 0.010 7.000 0.990 999.000
;PRINT(P1);< SYNTH 34
FINISH; < ZV2OD.DAT